From: Leo Liu <sdl.web@gmail.com>
Date: Sat, 16 May 2015 01:03:29 +0000 (+0800)
Subject: Revert "Fix cps--gensym"
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~23^2~2899^2~1
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=e85053f8fecd2124450a4e27d629cf87cf508319;p=emacs.git

Revert "Fix cps--gensym"

* lisp/emacs-lisp/generator.el (cps--gensym): Revert commit
  fbda511ab8069d0115eafca411a43353b85431b1 on 2015-05-14.
---

diff --git a/lisp/emacs-lisp/generator.el b/lisp/emacs-lisp/generator.el
index 65def39bf2e..8251682590e 100644
--- a/lisp/emacs-lisp/generator.el
+++ b/lisp/emacs-lisp/generator.el
@@ -90,7 +90,7 @@
   ;; Change this function to use `cl-gensym' if you want the generated
   ;; code to be easier to read and debug.
   ;; (cl-gensym (apply #'format fmt args))
-  `(make-symbol (format ,fmt . ,args)))
+  `(make-symbol ,fmt))
 
 (defvar cps--dynamic-wrappers '(identity)
   "List of transformer functions to apply to atomic forms we